< previous page page_185 next page >

Page 185
   NumberOfSubKeys = 0
   res = GetKeyInfo2(hKey, NumberOfSubKeys, MaxSubKeyLength)
   MsgBox "NumberOfSubKeys: " & NumberOfSubKeys & _
   "  MaxSubKeyLength: " & MaxSubKeyLength

   NumberOfSubKeys = 0
   res = GetKeyInfo3(hKey, NumberOfSubKeys, MaxSubKeyLength)
   MsgBox "NumberOfSubKeys: " & NumberOfSubKeys & _
   "  MaxSubKeyLength: " & MaxSubKeyLength
End Function
You'll see the full implementation of this function in Puzzle 13.

 
< previous page page_185 next page >